inherited FCadastroCartaCorrecao: TFCadastroCartaCorrecao
  Left = 252
  Top = 24
  Caption = ' Cadastro Carta Corre'#231#227'o'
  Constraints.MaxHeight = 700
  Constraints.MaxWidth = 1000
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    ActivePage = TsCadastro
    inherited TsPesquisa: TTabSheet
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'CC_CODIGO'
            Title.Alignment = taCenter
            Width = 66
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NF_NUMERONF'
            Title.Alignment = taCenter
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NF_SERIENF'
            Title.Alignment = taCenter
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CC_DATA'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NF_CHAVE'
            Visible = True
          end>
      end
      inherited pnPesquisaPadrao: TPanel
        object GroupBox2: TGroupBox
          Left = 691
          Top = 9
          Width = 147
          Height = 43
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          object CheckBox1: TCheckBox
            Tag = 1
            Left = 1
            Top = 8
            Width = 145
            Height = 17
            Caption = 'N'#227'o Enviado'
            Color = clYellow
            Ctl3D = False
            ParentColor = False
            ParentCtl3D = False
            TabOrder = 0
            OnClick = CheckBox1Click
          end
          object CheckBox2: TCheckBox
            Tag = 1
            Left = 1
            Top = 25
            Width = 145
            Height = 17
            Caption = 'Enviado'
            Color = clLime
            Ctl3D = False
            ParentColor = False
            ParentCtl3D = False
            TabOrder = 1
            OnClick = CheckBox2Click
          end
        end
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        object Label14: TLabel [0]
          Left = 9
          Top = 44
          Width = 40
          Height = 16
          Caption = 'C'#243'digo'
        end
        object Label1: TLabel [1]
          Left = 66
          Top = 44
          Width = 35
          Height = 16
          Caption = 'N'#186' NF'
        end
        object Label2: TLabel [2]
          Left = 11
          Top = 89
          Width = 48
          Height = 16
          Caption = 'Cod. NF'
        end
        object Label3: TLabel [3]
          Left = 77
          Top = 89
          Width = 101
          Height = 16
          Caption = 'Chave de Acesso'
        end
        object Label4: TLabel [4]
          Left = 10
          Top = 136
          Width = 106
          Height = 16
          Caption = 'Texto da Corre'#231#227'o'
        end
        object Label5: TLabel [5]
          Left = 207
          Top = 45
          Width = 83
          Height = 16
          Caption = 'Data Corre'#231#227'o'
        end
        object Label6: TLabel [6]
          Left = 146
          Top = 44
          Width = 30
          Height = 16
          Caption = 'S'#233'rie'
        end
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
        end
        inherited panel3: TPanel
          object BitBtn2: TBitBtn
            Left = 5
            Top = 5
            Width = 100
            Height = 25
            Hint = 'Emitir carta de corre'#231#227'o'
            Caption = 'CC-e'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 4
            OnClick = BitBtn2Click
            Glyph.Data = {
              B6030000424DB603000000000000360000002800000012000000100000000100
              18000000000080030000C40E0000C40E00000000000000000000FAFEFFF3F7FC
              F1F4F8F6F8F9F5F4F6F8F6F6FEF8F9FCF6F7FDF5F6FEF6F7FEF4FAFEF4FAFFF8
              FFFFFBFFFFFAFFF6F1FAFEFBFDFCFCFC0000E8EEF3F8FFFFF8FDFFF8FCFDFFFF
              FFFCFAFAF2EDEEFFFCFBF7F1F2ECE4E5F5ECEFFFFDFFFDF5FCF1E9F0F6EEF8FF
              FCFFFEFBFDFCFCFC0000F2FEFFEDF9FBF0F9FCDAE2E2B4B9B8BABDBBE3E1E0F8
              F5F1D7D3D2BCB7B6C9C4C3EFE9EAFDF6F9FFFAFCFFFDFFFEFBFDFEFBFDFCFCFC
              0000EFFCFEF1FFFEBFCBCBABB6B4D6DDDAD0D4CFA5A7A1A4A49EC7C4BFB5B2AD
              C4C0BBE1DCD9F3EEEBFFFFFEFFFFFEF2EDEEFEFCFCFCFCFC0000F0FFFFE0EEED
              D2DFDDCBD6D3D6DDD8F0F7F0FEFFF8F1F2E8A6A69AA5A398B9B5AACAC5BCCFCA
              C1E1DED6FCF6EFFFFDF8FEFCFBFCFCFC0000F1FFFEF3FFFFC7D2CFB4BEB8F3FB
              F4FCFFF8CDCFC3C7C6B8BCB9ABA7A495A29D8EB5B0A1C2BCAFC4BEB1DED8CDFF
              FFF7FEFDF9FCFCFC0000F3FEFCF6FFFEDAE1DEC0C6C1D6D9D0F4F3E9FBFAECFF
              FBECF0E9D8D5CDBCB6AC9BBCB2A1D2C8B7C7BDACCAC0AFF0E8DBFFFDF9FCFCFC
              0000F1F6F4FBFFFEE0E4DFC9CBC5F3F0E8F4F0E5C9C1B4B9B1A0BCB09ECABEAC
              B7A997AFA18FC9BBA9C8BAA8CCBEACF1E6D8FFFCF9FCFCFC0000FDFBFAF8F6F5
              FCF9F5E1DED6C4BBB2E4DBCEFBEEE0D7C8B8E7D7C6D5C3B2E2CEBCBBA795B29E
              8CD7C3B1D4C0AFD8C8BBF3EEEBFEFEFE0000FFFFFEE6E1DEE9E2DFBDB3ACBCB1
              A9B8A9A0E1D1C4CDBDADC5B0A1D2BEADFFEDDCC8B4A3B9A292C1AD9CC8B3A4C6
              B6AAD8D3D0EBEBEB0000FFFEFED7CECBBDB1AFD0C4BEC9BCB4B7A89FC6B6AAF2
              E1D4DFC9BDE7D2C3FFFAEBC8B5A6C0AA9EBFAC9FCAB7AABAABA2D6D1CEEBEBEB
              0000F2EAEAFEF4F4E0D4D2BDB2AEBDAFA9CABDB5BEAFA6B4A498E0CEC3DECCC1
              F0DED3C2B2A6B6A59CBDAEA5C8B9B0C1B5AFF0ECEBFCFCFC0000FFFFFEE5E0DF
              F3ECE9C0BAB5FAF0E9AAA198B2A79FAAA096B9ADA3BEB4AACBC0B8CFC6BDB3A9
              A2C3BBB4D1C8C4E8E3E0FEFCFBFFFFFF0000F1EFEEF2F0EFFDF9F8C7C4C0F2EE
              E9D0CAC3D2CCC5B7B2A9B1ABA4A9A39C9A978FBBB8B3A7A4A0C4C3BFCCCDCBEA
              EAEAFAFAFAFEFEFE0000FDFFFFF0F3F1DCDDDBF4F5F1E9E9E3D9D9D3C1C1BBD5
              D6CDFDFDF7E4E6E0C7CBC6DEE3E1D9DEDDF1F7F6F5FDFDF8FFFFF6F8F8FEFEFE
              0000EDF2F1F5FAF9F6F9F7F5F9F4FAFBF7FFFFFBFFFFFBF7F9F3F8FCF6F8FFF8
              F9FEFCF8FFFEF3FBFBECF8F8F4FFFFEEF8F8F6FAFBFFFFFF0000}
          end
        end
        object edCodigo: TDBEdit
          Left = 8
          Top = 61
          Width = 45
          Height = 22
          TabStop = False
          Ctl3D = False
          DataField = 'CC_CODIGO'
          DataSource = dsCadastro
          ParentCtl3D = False
          ReadOnly = True
          TabOrder = 5
        end
        object DBENome: TDBEdit
          Left = 9
          Top = 106
          Width = 56
          Height = 22
          TabStop = False
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'NF_CODIGO'
          DataSource = dsCadastro
          ParentCtl3D = False
          ReadOnly = True
          TabOrder = 6
        end
        object DBEdit1: TDBEdit
          Left = 75
          Top = 106
          Width = 319
          Height = 22
          TabStop = False
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'NF_CHAVE'
          DataSource = dsCadastro
          ParentCtl3D = False
          ReadOnly = True
          TabOrder = 7
        end
        object DBMemo1: TDBMemo
          Left = 8
          Top = 153
          Width = 637
          Height = 261
          Ctl3D = False
          DataField = 'CC_TEXTO_CORRECAO'
          DataSource = dsCadastro
          MaxLength = 1000
          ParentCtl3D = False
          TabOrder = 4
        end
        object DBDateEdit1: TDBDateEdit
          Left = 207
          Top = 61
          Width = 98
          Height = 23
          TabStop = False
          DataField = 'CC_DATA'
          DataSource = dsCadastro
          ReadOnly = True
          Ctl3D = False
          NumGlyphs = 2
          ParentCtl3D = False
          TabOrder = 8
        end
        object DBEdit2: TDBEdit
          Left = 65
          Top = 61
          Width = 76
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'NF_NUMERONF'
          DataSource = dsCadastro
          MaxLength = 8
          ParentCtl3D = False
          TabOrder = 2
          OnKeyPress = DBEdit2KeyPress
        end
        object DBRGSituacao: TDBRadioGroup
          Tag = 5
          Left = 320
          Top = 53
          Width = 208
          Height = 31
          Caption = '  Situa'#231#227'o  '
          Color = clBtnFace
          Columns = 2
          Ctl3D = False
          DataField = 'CC_SITUACAO_CC'
          DataSource = dsCadastro
          Enabled = False
          Items.Strings = (
            'N'#227'o Enviada'
            'Enviada')
          ParentColor = False
          ParentCtl3D = False
          ReadOnly = True
          TabOrder = 9
          Values.Strings = (
            '0'
            '1')
        end
        object DBEdit3: TDBEdit
          Left = 145
          Top = 61
          Width = 40
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'NF_SERIENF'
          DataSource = dsCadastro
          MaxLength = 8
          ParentCtl3D = False
          TabOrder = 3
          OnExit = DBEdit3Exit
          OnKeyPress = DBEdit2KeyPress
        end
        object RLReport1: TRLReport
          Left = -72
          Top = 456
          Width = 794
          Height = 1123
          DataSource = dsCadastro
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          object RLBand1: TRLBand
            Left = 38
            Top = 38
            Width = 718
            Height = 522
            BandType = btHeader
            object RLLabel2: TRLLabel
              Left = 250
              Top = 138
              Width = 165
              Height = 16
              Caption = 'xxxxxxxxxxxxxxxxxxxxxxx'
            end
            object RLLabel1: TRLLabel
              Left = 219
              Top = 108
              Width = 57
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel3: TRLLabel
              Left = 135
              Top = 108
              Width = 84
              Height = 15
              Caption = 'N'#250'mero/S'#233'rie:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLLabel4: TRLLabel
              Left = 135
              Top = 138
              Width = 103
              Height = 15
              Caption = 'Chave de acesso:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLMemo1: TRLMemo
              Left = 133
              Top = 275
              Width = 548
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel5: TRLLabel
              Left = 1
              Top = 276
              Width = 111
              Height = 15
              Caption = 'Texto da Corre'#231#227'o:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLLabel6: TRLLabel
              Left = 310
              Top = 108
              Width = 84
              Height = 15
              Caption = 'Data Emiss'#227'o:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLLabel7: TRLLabel
              Left = 490
              Top = 108
              Width = 88
              Height = 15
              Caption = 'Data Corre'#231#227'o:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLLabel8: TRLLabel
              Left = 399
              Top = 108
              Width = 57
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel9: TRLLabel
              Left = 582
              Top = 108
              Width = 57
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel10: TRLLabel
              Left = 252
              Top = 3
              Width = 185
              Height = 19
              Caption = 'CARTA DE CORRE'#199#195'O'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -16
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLImage1: TRLImage
              Left = 6
              Top = 27
              Width = 128
              Height = 96
              Scaled = True
            end
            object RLLabel12: TRLLabel
              Left = 135
              Top = 38
              Width = 64
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel11: TRLLabel
              Left = 135
              Top = 52
              Width = 64
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel13: TRLLabel
              Left = 135
              Top = 66
              Width = 64
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel14: TRLLabel
              Left = 3
              Top = 171
              Width = 75
              Height = 15
              Caption = 'Destinatario:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object RLMemo2: TRLMemo
              Left = 133
              Top = 170
              Width = 548
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLDraw1: TRLDraw
              Left = -2
              Top = 121
              Width = 722
              Height = 12
              DrawKind = dkLine
            end
            object RLDraw2: TRLDraw
              Left = -2
              Top = 265
              Width = 722
              Height = 12
              DrawKind = dkLine
            end
            object RLLabel15: TRLLabel
              Left = 135
              Top = 80
              Width = 64
              Height = 15
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLDraw3: TRLDraw
              Left = -4
              Top = 157
              Width = 722
              Height = 12
              DrawKind = dkLine
            end
            object RLLabel16: TRLLabel
              Left = 235
              Top = 506
              Width = 30
              Height = 15
              Caption = 'Visto'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLLabel17: TRLLabel
              Left = 427
              Top = 506
              Width = 29
              Height = 15
              Caption = 'Data'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -12
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object RLDraw4: TRLDraw
              Left = 140
              Top = 494
              Width = 397
              Height = 12
              DrawKind = dkLine
            end
          end
        end
      end
    end
  end
  inherited PopupMenu1: TPopupMenu
    Left = 608
    Top = 96
  end
  inherited dsCadastro: TDataSource
    Left = 568
    Top = 80
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'SELECT * FROM CARTACORRECAO')
    Left = 712
    Top = 136
  end
  inherited dspCadastro: TDataSetProvider
    Left = 656
    Top = 96
  end
  inherited cdsCadastro: TClientDataSet
    Left = 776
    Top = 112
    object cdsCadastroCC_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CC_CODIGO'
    end
    object cdsCadastroNF_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo NF'
      FieldName = 'NF_CODIGO'
    end
    object cdsCadastroNF_CHAVE: TStringField
      DisplayLabel = 'Chave Acesso'
      FieldName = 'NF_CHAVE'
      Size = 255
    end
    object cdsCadastroCC_DATA: TDateTimeField
      DisplayLabel = 'Data Corre'#231#227'o'
      FieldName = 'CC_DATA'
    end
    object cdsCadastroCC_TEXTO_CORRECAO: TMemoField
      FieldName = 'CC_TEXTO_CORRECAO'
      BlobType = ftMemo
      Size = 1000
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      Size = 1
    end
    object cdsCadastroUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
    end
    object cdsCadastroDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
    end
    object cdsCadastroSITUACAO_DA_REPLICACAO: TStringField
      FieldName = 'SITUACAO_DA_REPLICACAO'
      Size = 1
    end
    object cdsCadastroCODIGOEMPRESA: TIntegerField
      FieldName = 'CODIGOEMPRESA'
    end
    object cdsCadastroDATA_REPLICACAO: TDateTimeField
      FieldName = 'DATA_REPLICACAO'
    end
    object cdsCadastroCC_SITUACAO_CC: TIntegerField
      FieldName = 'CC_SITUACAO_CC'
    end
    object cdsCadastroNF_NUMERONF: TStringField
      Alignment = taCenter
      DisplayLabel = 'N'#186' NF'
      FieldName = 'NF_NUMERONF'
      Size = 10
    end
    object cdsCadastroNF_SERIENF: TStringField
      Alignment = taCenter
      DisplayLabel = 'S'#233'rie'
      FieldName = 'NF_SERIENF'
      Size = 3
    end
    object cdsCadastroCC_NSEQEVENTO: TIntegerField
      FieldName = 'CC_NSEQEVENTO'
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 656
    Top = 136
  end
  inherited OpenDialog1: TOpenDialog
    Left = 736
    Top = 80
  end
  object ACBrNFe: TACBrNFe
    Configuracoes.Geral.PathSalvar = 'C:\Arquivos de programas\Borland\Delphi7\Bin\'
    Configuracoes.WebServices.UF = 'SP'
    Configuracoes.WebServices.AguardarConsultaRet = 0
    Configuracoes.WebServices.IntervaloTentativas = 0
    Configuracoes.WebServices.AjustaAguardaConsultaRet = False
    Left = 444
    Top = 131
  end
  object QAux: TQuery
    BeforeInsert = QCadastroBeforeInsert
    BeforeEdit = QCadastroBeforeEdit
    BeforePost = QCadastroBeforePost
    BeforeCancel = QCadastroBeforeCancel
    BeforeDelete = QCadastroBeforeDelete
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT * FROM CARTACORRECAO')
    Left = 504
    Top = 216
  end
end
